function R = C_loadVideo(FileNameRoot)
% LOAD VIDEO DATA

R = load([FileNameRoot,'.mat']);
FID = fopen([FileNameRoot,'.dat'],'r');
N = prod(R.Data.Dims);
R.Data.Frames = reshape(fread(FID,N,'*uint8'),R.Data.Dims);
fclose(FID);
